home *** CD-ROM | disk | FTP | other *** search
/ C/C++ Users Group Library 1996 July / C-C++ Users Group Library July 1996.iso / vol_200 / 255_01 / gpmerge.asm < prev    next >
Encoding:
Assembly Source File  |  1988-03-28  |  768 b   |  41 lines
  1.           page   80,132
  2.           page
  3. ;
  4. ;         Kent Cedola
  5. ;         2015 Meadow Lake Court
  6. ;         Norfolk, Virginia  23518
  7. ;
  8.  
  9. dgroup    group  _data
  10.  
  11. _data     segment word public 'data'
  12.           assume ds:dgroup
  13.  
  14.           extrn  _gdmerge:byte
  15.  
  16. _data     ends
  17.  
  18. _text     segment byte public 'code'
  19.  
  20.           assume cs:_text,ds:dgroup
  21.           public _gpmerge
  22. _gpmerge  proc   near
  23.  
  24.           push   bp
  25.           mov    bp,sp
  26.  
  27.           mov    al,[bp+4]
  28.           and    al,3
  29.           shl    al,1
  30.           shl    al,1
  31.           shl    al,1
  32.           mov    _gdmerge,al
  33.  
  34.           pop    bp
  35.           ret
  36.  
  37. _gpmerge  endp
  38.  
  39. _text     ends
  40.           end
  41.